home *** CD-ROM | disk | FTP | other *** search
/ Hunter 2006 / Hunter 2006.iso / soft / sleipnir241.exe / {app} / scripts / ƒŠƒ“ƒNˆ— / LINKæ‚ð‹­§• / Ž¦.js
Text File  |  2006-06-15  |  768b  |  30 lines
  1. /*==========================================================
  2. Script by jin-ren
  3. ü@LINKɵé≡ï¡Éºò\Ī
  4. ü@LINKæSé─é╠ëíé╔URLé≡Æ╟ë┴é╡é▄é╖
  5.                                                 2002/09/08
  6. ==========================================================*/
  7.   var obj, document, id, x;
  8.  
  9.   obj = new ActiveXObject("Sleipnir.API");
  10.   id = obj.GetDocumentID(obj.ActiveIndex);
  11.   document = obj.GetDocumentObject(id);
  12.  
  13.   if (document == null)
  14.   {
  15.     obj.MessageBox("Document é≡ì∞ɼé┼é½é▄é╣é±");
  16.   }
  17.   else
  18.   {
  19.     var atag=document.links;
  20.     for (i in atag){
  21.       x = atag[i].href;
  22.       if(x==null){continue;}
  23.       atag[i].insertAdjacentHTML("AfterEnd","<b><small>("+x+")</small></b>");
  24.     }
  25.  
  26.     document = null;
  27.   }
  28.   obj.beep();
  29.   obj = null;
  30.